home *** CD-ROM | disk | FTP | other *** search
/ SPACE 1 / SPACE - Library 1 - Volume 1.iso / misc~1 / 28 / m2speech / speech.def next >
Text File  |  1987-04-04  |  1KB  |  22 lines
  1. DEFINITION MODULE       speech;
  2.  
  3. (*         USE THIS MODULE ONLY WITHIN A GEM APPLICATION                *)
  4. (* This module uses the sound chip as a speech synthesizer.             *)
  5. (* The executable file SPEECH.EXE must be in same directory as the      *)
  6. (* program. To use first call initspeechmodule once at the start        *)
  7. (* then use say to speak your text. setpitch and setrate are optional   *)
  8. (*                                                                      *)
  9. (*              EXAMPLE                                                 *)  (*      ok:=initspeechmodule();                                         *)  (*      IF ok THEN                                                      *)
  10. (*         say("this is ok");                                           *)
  11. (*      END                                                             *)
  12.  
  13. PROCEDURE       initspeechmodule() : BOOLEAN;
  14.  
  15. PROCEDURE       setpitch(pitch: CARDINAL);      (* range 0..100 *)
  16.  
  17. PROCEDURE       setrate(rate: CARDINAL);        (* range 0..100 *)
  18.  
  19. PROCEDURE       say(VAR text: ARRAY OF CHAR);
  20.  
  21. END                     speech.
  22.